my webpage

VBA

	snippet
Dim start_date As Date, end_date As Date start_date = TimeValue("11:00") end_date = TimeValue("13:30") MsgBox Abs((end_date - start_date) - (start_date > end_date)) * 24 * 60
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx
xxx